home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1986 February
/
64er_Magazin_86-02_1986_Markt__Technik_de.d64
/
sound-editor +
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
23KB
|
1,189 lines
0 ifa>1thenreturn
1000 :
1005 :
1010 :
1015 :
1020 :
1025 :
1030 :
1035 :
1040 :
1045 :
1050 :
1055 :
1060 ifw=0thenw=1:load"wersi",8,1
1065 ifm=7then7665
1068 ifm=7.5then7960
1070 :
1080 ifa=0thena=.1:load"modulator",8,1
1082 ifa=.1thena=.2:load"sequencer.obj",8,1
1084 ifa=.2thena=1:load"seq.erg.obj",8,1
1120 :
1130 ifa=0thena=1:load"modulator",8,1
1140 :
1150 :
1155 poke56,144:clr
1160 dimv%(8,255),tn%(255),th(49)
1165 dimbf(2),t(2),o(2),of(2),s(2)
1170 dimc1(2),c(2),ad(2),sr(2)
1175 dimbl$(6),kv$(3),kf$(6),md$(3)
1180 dimtn$(11)
1185 :
1190 gosub8000
1200 gosub4000
1210 :
1500 :
1510 :
1520 :
1530 sys51300:geta$:ifa$=""then1530
1535 ifa$="[215]"thengosub20000:goto1530
1540 a=asc(a$)
1550 sysgs,v%(m,a)
1560 goto1530
2000 :
2010 :
2020 :
2025 poke650,0
2030 f=th(tn%(a)):ad=mo+72:x=peek(ad)
2035 ifs(0)thensysdo,mo,f*bf(0):pokesi+4,c1(0)
2040 ifs(1)thensysdo,mo+7,f*bf(1):pokesi+11,c1(1)
2050 ifs(2)thensysdo,mo+14,f*bf(2):pokesi+18,c1(2)
2090 ifegthenpokead,xor1
2110 ifsuthenpoke650,128:return
2120 ifpeek(203)<>64andpeek(198)=0then2120
2130 pokead,xand254
2140 pokesi+4,c(0)
2150 pokesi+11,c(1):pokesi+18,c(2)
2160 poke650,128:return
2500 :
2510 :
2520 :
2530 :
2550 pw=pw+p2:ifpw>=pmthenpw=pw-pm
2555 sysgt,pv
2560 pw=pw+p1:ifpw>=pmthenpw=pw-pm
2565 sysgt,pv
2570 pw=pw-p1:ifpw<0thenpw=pw+pm
2575 sysgt,pv
2580 pw=pw-p2:ifpw<0thenpw=pw+pm
2585 sysgt,pv
2600 :
2605 :
2610 sysdo,pa,pw:l=len(str$(pw))
2620 syspr,3+ln,4,bl$(6-l);f2$;pw
2625 return
2630 :
2635 :
2640 pokepa,pw:l=len(str$(pw))
2650 syspr,3+ln,11,bl$(4-l);f2$;pw
2655 return
2660 :
2665 :
2670 pokepa,pw:l=len(str$(pw))
2680 syspr,3+ln,16,bl$(4-l);f2$;pw
2685 return
2690 :
2695 :
2700 ifa>136ora<133thenreturn
2705 b=a-133
2710 pokepa,(peek(pa)and231)or(b*8)
2715 syspr,3+ln,21,f2$;kv$(b)
2717 syspr,6,34,f2$;kf$(b):return
2720 :
2725 :
2730 ifa>135ora<133thenreturn
2735 b=a-132
2740 pokepa,(peek(pa)and249)or(b*2)
2745 syspr,3+ln,28,f2$;md$(b):return
2750 :
2755 :
2760 pokepa,pw:l=len(str$(pw))
2765 syspr,7,s,bl$(4-l);f2$;pw:return
2770 :
2775 :
2780 b=-(a>134)
2785 pokepa,(peek(pa)and247)or(b*8)
2790 syspr,7,29,f2$;chr$(43+2*b)
2795 return
2810 :
2815 :
2820 ifa>135ora<133thenreturn
2825 b=a-132
2830 pokepa,(peek(pa)and249)or(b*2)
2835 syspr,7,33,f2$;md$(b):return
2840 :
2845 :
2850 pokepa,pwand7:pokepa+1,int(pw/8)
2855 l=len(str$(pw))
2860 syspr,5,2,bl$(5-l);f2$;pw:return
2865 :
2870 :
2875 rf=(rfand15)+16*pw:pokepa,rf
2880 l=len(str$(pw))
2885 syspr,5,9,bl$(3-l);f2$;pw:return
2890 :
2895 :
2900 ifa>136ora<133thenreturn
2905 b=a-133
2910 x=2^b:x1=255-x
2915 y=rfandx
2920 rf=(rfandx1)or(x-y):pokepa,rf
2925 y=-128*(y=0):ad=1024+(5+b)*40+15
2930 fori=adtoad+5
2935 pokei,(peek(i)and127)ory
2940 next:return
2945 :
2950 :
2955 ifa>136ora<133thenreturn
2960 b=a-129
2965 x=2^b:x1=255-x
2970 pw=peek(pa):y=pwandx
2975 pokepa,(pwandx1)or(x-y)
2980 y=-128*(y=0):ad=1024+(1+b)*40+25
2985 fori=adtoad+3
2990 pokei,(peek(i)and127)ory
2995 next:return
3000 :
3005 :
3010 pokepa,(peek(pa)and240)orpw
3015 l=len(str$(pw))
3020 syspr,5,31,bl$(3-l);f2$;pw:return
3050 :
3052 :
3054 ifa<>134then3064
3056 :
3058 of=of+1:ifof<=50then3110
3062 of=-49:goto3076
3064 ifa<>135then3074
3066 :
3068 of=of-1:ifof>=-49then3110
3072 of=50:goto3084
3074 ifa<>133then3082
3076 :
3078 t=t+1:ift<=11then3110
3080 t=0:goto3090
3082 ifa<>136thenreturn
3084 :
3086 t=t-1:ift>=0then3110
3088 t=11:goto3096
3090 :
3092 o=o+1:ifo<=5then3110
3094 o=0:goto3110
3096 :
3098 o=o-1:ifo>=0then3110
3100 o=5:t=10
3110 :
3112 ift=11ando=5thent=0:o=0
3114 bf=440*2^(o-4+(t-9)/12+of/1200)
3116 o(sn)=o:t(sn)=t:of(sn)=of
3118 bf(sn)=bf*17.0327
3120 sysdo,mo+7*sn,f*bf(sn)
3122 :
3124 syspr,3+sn,3,f2$;o
3126 syspr,3+sn,2,tn$(t)
3128 syspr,3+sn,5,right$(" "+str$(of),3)
3130 return
3150 :
3155 :
3160 sysdo,pa,pw
3165 syspr,3+sn,9,f2$;right$(" "+str$(pw),4)
3170 return
3175 :
3180 :
3185 ad(sn)=(ad(sn)and15)orpw*16
3190 pokepa,ad(sn)
3195 syspr,3+sn,14,f2$;right$(str$(pw),2)
3200 return
3205 :
3210 :
3215 ad(sn)=(ad(sn)and240)orpw
3220 pokepa,ad(sn)
3225 syspr,3+sn,17,f2$;right$(str$(pw),2)
3230 return
3235 :
3240 :
3245 sr(sn)=(sr(sn)and15)orpw*16
3250 pokepa,sr(sn)
3255 syspr,3+sn,20,f2$;right$(str$(pw),2)
3260 return
3265 :
3270 :
3275 sr(sn)=(sr(sn)and240)orpw
3280 pokepa,sr(sn)
3285 syspr,3+sn,23,f2$;right$(str$(pw),2)
3290 return
3300 :
3305 :
3310 ifa<>133anda<>134then3335
3315 :
3320 c(sn)=c(sn)or2^(7-s)
3325 c1(sn)=c(sn)or1
3330 syspr,3+sn,26+s,f2$;"1":goto3355
3335 :
3340 c(sn)=c(sn)and255-2^(7-s)
3345 c1(sn)=c(sn)or1
3350 syspr,3+sn,26+s,f2$;"0"
3355 :
3358 poke50334+sn,c(sn)
3360 x=c(sn):ifsuthenx=c1(sn)
3362 poke984+sn,c(sn):poke987+sn,c1(sn)
3365 pokesi+7*sn+4,x:return
3370 :
3375 :
3380 pokepa,pw:l=len(str$(pw))
3385 syspr,3+sn,34,bl$(4-l);f2$;pw
3390 return
3400 :
3405 :
3410 ifpw<40thenpw=40
3415 ifpw>480thenpw=480
3420 te=pw:sysdo,pa,int(6e7/(24*te))
3425 syspr,6,11,f2$;right$(str$(pw),3)
3430 return
3500 :
3510 :
3520 :
3525 syspr,15,10,f2$;"stimme 1,2,3"
3530 geta$:ifa$=""then3530
3540 ifa$="1"ora$="2"ora$="3"then3560
3550 goto3590
3560 i=val(a$)-1:s(i)=nots(i)
3565 poke981+i,abs(s(i))
3570 ifs(i)thenprintchr$(18);
3580 syspr,21,31+2*i,f1$;a$;chr$(146);
3590 syspr,15,10,f1$;"stimme 1,2,3"
3595 return
3600 :
3610 :
3620 :
3630 poke650,64
3640 ad=mo+27:x=peek(ad):pokead,xor1
3650 ifpeek(203)<>64andpeek(198)=0then3650
3660 pokead,xand254:poke650,128:return
3700 :
3710 :
3720 :
3730 eg=noteg
3735 poke990,abs(eg)
3740 ifegthenprintchr$(18);
3750 syspr,23,31,f1$;"soft-eg[146]":return
3800 :
3810 :
3820 :
3830 su=notsu
3835 poke991,abs(su)
3840 poke50344,-su:ifsuthenprintchr$(18);
3850 syspr,22,31,f1$;"sustain[146]"
3860 ifnotsuthen2140
3870 return
4000 :
4010 :
4020 :
4030 m=0:pv=0:syscl:print"";f1$
4040 print" [176][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][174]"
4045 print" [194] m o d u l a t o r [146][194]"
4050 print" [194] thomas kraetzig 1985 [146][194]"
4055 print" [173][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][189]"
4100 syspr,6,1,f2$;"sh v";f1$;" stimmen"
4105 syspr,7,1,f2$;" f";f1$;" filter/lautstaerke"
4110 syspr,8,1,f2$;" l";f1$;" lfo"
4115 syspr,9,1,f2$;" h";f1$;" huellkurve (soft-eg)"
4120 syspr,10,1,f2$;" k";f1$;" ksv "
4125 syspr,11,1,f2$;"sh s";f1$;" sounds"
4130 syspr,12,1,f2$;" d";f1$;" disk"
4132 syspr,13,1,f2$;" a";f1$;" sequencer"
4135 return
4200 :
4210 :
4220 :
4240 syspr,15,1,f2$;"v 1,2,3"
4245 syspr,15,10,f1$;"stimme 1,2,3
4250 [158]pr,15,26,f2$;"s"
4255 [158]pr,15,32,f1$;"sustain"
4260 [158]pr,16,1,f2$;"sh space"
4270 [158]pr,16,10,f1$;"eg (ab)-koppeln)"
4280 [158]pr,16,26,f2$;"space"
4290 [158]pr,16,32,f1$;"eg gate"
4292 [158]pr,17,1,f2$;"x"
4294 [158]pr,17,10,f1$;"hauptmenue"
4295 [158]pr,18,1,;"sh w wersiboard stimmen"
4300 [158]pr,19,0,f2$;
4310 [129]i[178]1[164]4
4320 [153]" peek peek peek peek peek peek peek peek peek peek peek peek peek peek wait":[130]
4330 [153]" qpeekwpeekepeekrpeektpeekypeekupeekipeekopeekppeek@peek*peek^peek;peek="
4340 [158]pr,19,0,;
4350 [129]i[178]1[164]2
4360 [153]" ":[130]
4370 [153]" 2356790-\c"
4380 [158]pr,19,31,f1$;"aktiv:"
4390 [129]i[178]0[164]2
4400 a$[178][201]([196](i[170]1),1)
4410 [141]3570:[130]i
4420 [141]3840:[141]3740
4430 [142]
4500 :
4505 :
4510 :
4515 m[178]1:pv[178]3050:[158]cl:[153]"wait";f1$
4520 [153]" f pw a d s r control porta"
4525 [153]" orlenlenlenlenlenlen=lenlenlenlen=lenlen=lenlen=lenlen=lenlen=lenlenlenlenlenlenlen=lenlenlenlen^"
4530 [129]i[178]1[164]3
4535 [153]" peek peek peek peek peek peek peek peek peek"
4540 [130]i
4545 [153]" /lenlenlenlenlenlen>lenlenlenlen>lenlen>lenlen>lenlen>lenlen>=======>lenlenlenlenexp"
4550 [158]pr,7,26,"peekpeekpeekpeekpeekpeek/lenlensync"
4555 [158]pr,8,26,"peekpeekpeekpeekpeek/lenlenring"
4560 [158]pr,9,1,f2$;"f1 ++";f1$
4565 [158]pr,9,26,"peekpeekpeekpeek/lenlentest"
4570 [158]pr,10,1,f2$;"f3 +";f1$
4575 [158]pr,10,26,"peekpeekpeek/lenlentrian"
4580 [158]pr,11,1,f2$;"f5 -";f1$
4585 [158]pr,11,26,"peekpeek/lenlensawtooth"
4590 [158]pr,12,1,f2$;"f7 --";f1$
4595 [158]pr,12,26,"peek/lenlensquare"
4600 [158]pr,13,26,"/lenlennoise"
4602 :
4604 a$[178]f2$:f2$[178]f1$
4606 [129]sn[178]0[164]2
4608 t[178]t(sn):o[178]o(sn):of[178]of(sn)
4610 [141]3122
4612 pw[178]([183](mo[170]7[172]sn[170]2)):[141]3165
4614 pw[178][181](ad(sn)[173]16):[141]3195
4616 pw[178]ad(sn)[175]15:[141]3225
4618 pw[178][181](sr(sn)[173]16):[141]3255
4620 pw[178]sr(sn)[175]15:[141]3285
4622 :
4624 b[178]c(sn):a[178]128
4626 [158]pr,3[170]sn,26,f1$;"0000000"
4628 [129]s[178]7[164]1[169][171]1
4630 [139](b[175]a)[167][158]pr,3[170]sn,33[171]s,"1"
4632 a[178]a[173]2:[130]s
4634 pa[178]mo[170]7[172]sn[170]4:pw[178][194](pa)
4636 [141]3370
4638 [130]sn
4640 f2$[178]a$
4642 sn[178]0:av[178]4700:[158]gs,av:[142]
4650 :
4652 :
4654 :
4656 sn[178]sn[171]1:[139]sn[179]0[167]sn[178]2
4658 [141]5815:[158]gt,av
4660 :
4662 sn[178]sn[170]1:[139]sn[177]2[167]sn[178]0
4664 [141]5815:[158]gt,av
4666 :
4668 [139]av[179][177]4880[167]4674
4670 s[178]s[170]1:[139]s[177]6[167]av[178]4910
4672 [137]4678
4674 av[178]av[170]30:[139]av[177]4910[167]av[178]4700
4676 [139]av[178]4880[167]s[178]0
4678 [141]5815:[158]gt,av
4680 :
4682 [139]av[179][177]4880[167]4688
4684 s[178]s[171]1:[139]s[179]0[167]av[178]4850
4686 [137]4692
4688 av[178]av[171]30:[139]av[179]4700[167]av[178]4910
4690 [139]av[178]4880[167]s[178]6
4692 [141]5815:[158]gt,av
4700 :
4702 :
4704 pb[178]fa[170]40[172](sn[170]3)[170]2
4706 [129]i[178]pb[164]pb[170]5:[151]i,f2:[130]
4708 t[178]t(sn):o[178]o(sn):of[178]of(sn)
4710 pa[178]mo[170]7[172]sn:pv[178]3050:[142]
4730 :
4732 :
4734 pb[178]fa[170]40[172](sn[170]3)[170]9
4736 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
4738 pa[178]mo[170]7[172]sn[170]2:pw[178][183](pa):pm[178]4096
4740 p1[178]1:p2[178]50:pv[178]3150:[142]
4760 :
4762 :
4764 pb[178]fa[170]40[172](sn[170]3)[170]14
4766 [151]pb,f2:[151]pb[170]1,f2
4768 pa[178]si[170]7[172]sn[170]5:pw[178][181](ad(sn)[173]16)
4770 pm[178]16:p1[178]1:p2[178]1:pv[178]3175:[142]
4790 :
4792 :
4794 pb[178]fa[170]40[172](sn[170]3)[170]17
4796 [151]pb,f2:[151]pb[170]1,f2
4798 pa[178]si[170]7[172]sn[170]5:pw[178]ad(sn)[175]15
4800 pm[178]16:p1[178]1:p2[178]1:pv[178]3205:[142]
4820 :
4822 :
4824 pb[178]fa[170]40[172](sn[170]3)[170]20
4826 [151]pb,f2:[151]pb[170]1,f2
4828 pa[178]si[170]7[172]sn[170]6:pw[178][181](sr(sn)[173]16)
4830 pm[178]16:p1[178]1:p2[178]1:pv[178]3235:[142]
4850 :
4852 :
4854 pb[178]fa[170]40[172](sn[170]3)[170]23
4856 [151]pb,f2:[151]pb[170]1,f2
4858 pa[178]si[170]7[172]sn[170]6:pw[178]sr(sn)[175]15
4860 pm[178]16:p1[178]1:p2[178]1:pv[178]3265:[142]
4880 :
4882 :
4884 pb[178]fa[170]40[172](sn[170]3)[170]26[170]s
4886 [151]pb,f2
4888 pa[178]si[170]7[172]sn[170]4:pv[178]3300:[142]
4910 :
4912 :
4914 pb[178]fa[170]40[172](sn[170]3)[170]35
4916 [129]i[178]0[164]2:[151]pb[170]i,f2:[130]
4918 pa[178]mo[170]7[172]sn[170]4:pw[178][194](pa):pm[178]256
4920 p1[178]1:p2[178]10:pv[178]3370:[142]
5000 :
5005 :
5010 :
5015 m[178]2:pv[178]0:[158]cl:[153]"wait";f1$
5020 [153]"filter/lautstaerke"
5025 [153]" orlenlenlenlenlen=lenlenlenlenlen=lenlenlenlenlenlenlenlen=lenlenlenlenlenlenlen=lenlenlenlen^"
5030 [153]" peekfiltfpeek res peekschalterpeek modus peeklautpeek"
5035 [153]" -lenlenlenlenlen(NULL)lenlenlenlenlen(NULL)lenlenlenlenlenlenlenlen(NULL)lenlenlenlenlenlenlen(NULL)lenlenlenlen<"
5040 [153]" peek peek peek filt1 peek lp peek peek"
5045 [153]" -lenlenlenlenlen>lenlenlenlenlen< filt2 peek bp -lenlenlenlenexp"
5050 [153]" peek peek filt3 peek hp peek"
5055 [153]" peek peek filtex peek 3off peek"
5060 [153]" /lenlenlenlenlenlenlenlenlenlenlen>lenlenlenlenlenlenlenlen>lenlenlenlenlenlenlenexp"
5065 [153]f2$;" f1";f1$;" ++ filt1 lp ++"
5070 [153]f2$;" f3";f1$;" + filt2 bp +"
5075 [153]f2$;" f5";f1$;" - filt3 hp -"
5080 [153]f2$;" f7";f1$;" - filtex 3off --"
5085 pw[178]([194](mo[170]21)[175]7)[170]8[172][194](mo[170]22)
5090 [158]pr,5,7[171][195]([196](pw)),pw
5095 pw[178][181](rf[173]16)
5100 [158]pr,5,12[171][195]([196](pw)),pw
5102 [139]rf[175]1[167][158]pr,5,15,"filt1 wait"
5104 [139]rf[175]2[167][158]pr,6,15,"filt2 wait"
5106 [139]rf[175]4[167][158]pr,7,15,"filt3 wait"
5108 [139]rf[175]8[167][158]pr,8,15,"filtexwait"
5110 pw[178][194](mo[170]23)
5112 [139]pw[175]16[167][158]pr,5,25," lp wait"
5114 [139]pw[175]32[167][158]pr,6,25," bp wait"
5116 [139]pw[175]64[167][158]pr,7,25," hp wait"
5118 [139]pw[175]128[167][158]pr,8,25,"3offwait"
5120 pw[178][194](mo[170]23)[175]15
5122 [158]pr,5,34[171][195]([196](pw)),pw
5125 av[178]5200:[158]gs,av:[142]
5130 :
5135 :
5140 :
5145 av[178]av[170]50:[139]av[177]5400[167]av[178]5200
5150 [137]5165
5155 :
5160 av[178]av[171]50:[139]av[179]5200[167]av[178]5400
5165 [141]5815:a[178]pb[171]fa[171]200
5170 [139]a[179][177]15[175]a[179][177]25[167][158]gt,av
5175 [129]j[178]1[164]3:pb[178]pb[170]40:[141]5815:[130]
5180 pb[178]pb[171]120:[158]gt,av
5200 :
5205 :
5210 pb[178]fa[170]203
5215 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
5220 pa[178]mo[170]21:pw[178][194](pa)[170]8[172][194](pa[170]1)
5225 pm[178]2048:p1[178]1:p2[178]50:pv[178]2850:[142]
5250 :
5255 :
5260 pb[178]fa[170]210
5265 [151]pb,f2:[151]pb[170]1,f2
5270 pa[178]si[170]23:pw[178][181](rf[173]16)
5275 pm[178]16:p1[178]1:p2[178]1:pv[178]2875:[142]
5300 :
5310 pb[178]fa[170]215
5315 [129]i[178]0[164]120[169]40:[129]j[178]0[164]5
5320 [151]pb[170]i[170]j,f2:[130]:[130]
5325 pa[178]si[170]23:pw[178]rf[175]15
5330 pv[178]2900:[142]
5350 :
5355 :
5360 pb[178]fa[170]225
5365 [129]i[178]0[164]120[169]40:[129]j[178]0[164]3
5370 [151]pb[170]i[170]j,f2:[130]:[130]
5375 pa[178]mo[170]23
5380 pv[178]2955:[142]
5400 :
5405 :
5410 pb[178]fa[170]232
5415 [151]pb,f2:[151]pb[170]1,f2
5420 pa[178]mo[170]23:pw[178][194](pa)[175]15
5425 pm[178]16:p1[178]1:p2[178]1:pv[178]3010:[142]
5500 :
5505 :
5510 :
5515 m[178]3:[158]cl:[153]"wait";f1$;
5520 [153]" orlenlenlenlenlenlen=lenlenlenlen=lenlenlenlen=lenlenlenlenlenlen=lenlenlenlenlen^"
5525 [153]" peek lfof peeklfoppeeklfoapeekkurve peekmoduspeek"
5530 [153]" orlen(NULL)lenlenlenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlenlenlen(NULL)lenlenlenlenlen(NULL)lenlenlenlen^"
5535 [129]z[178]3[164]9
5540 [158]pr,z,1,"peek peek peek peek peek peek peek peek"
5545 [130]z
5550 [158]pr,10,1,"/len>lenlenlenlenlenlen>lenlenlenlen>lenlenlenlen>lenlenlenlenlenlen>lenlenlenlenlen>lenlenlenlenexp"
5555 [153]f2$;" f1";f1$;" ++ ++ ++ trian reset"
5560 [153]f2$;" f3";f1$;" + + + sawup hold"
5565 [153]f2$;" f5";f1$;" - - - sawdwn run"
5570 [153]f2$;" f7";f1$;" -- -- -- square"
5575 [129]ln[178]0[164]6
5580 z[178]3[170]ln
5585 [158]pr,z,2,[199](48[170]ln)
5590 pw[178][183](mo[170]32[170]5[172]ln)
5595 [158]pr,z,10[171][195]([196](pw)),pw
5600 pw[178][194](mo[170]34[170]5[172]ln)
5605 [158]pr,z,15[171][195]([196](pw)),pw
5610 pw[178][194](mo[170]35[170]5[172]ln)
5615 [158]pr,z,20[171][195]([196](pw)),pw
5620 pw[178][194](mo[170]36[170]5[172]ln)
5625 [158]pr,z,21,kv$((pw[175]24)[173]8)
5630 [158]pr,z,28,md$((pw[175]6)[173]2)
5640 [130]ln
5645 ln[178]0:av[178]5830:[158]gs,av:[142]
5650 :
5655 :
5670 :
5675 ln[178]ln[171]1:[139]ln[179]0[167]ln[178]6
5680 [141]5815:[158]gt,av
5685 :
5690 ln[178]ln[170]1:[139]ln[177]6[167]ln[178]0
5695 [141]5815:[158]gt,av
5700 :
5705 av[178]av[170]30:[139]av[177]5950[167]av[178]5830
5710 [141]5810:[158]gt,av
5715 :
5720 av[178]av[171]30:[139]av[179]5830[167]av[178]5950
5725 [141]5810:[158]gt,av
5800 :
5805 :
5810 [158]pr,6,34," "
5815 [129]i[178]pb[164]pb[170]6:[151]i,f1:[130]:[142]
5820 :
5825 :
5830 pb[178]fa[170]40[172](ln[170]3)[170]4
5835 [129]i[178]pb[164]pb[170]5:[151]i,f2:[130]
5840 pa[178]mo[170]32[170]5[172]ln:pw[178][183](pa):pm[178]65536
5845 p1[178]1:p2[178]200:pv[178]2610:[142]
5850 :
5855 :
5860 pb[178]fa[170]40[172](ln[170]3)[170]11
5865 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
5870 pa[178]mo[170]34[170]5[172]ln:pw[178][194](pa):pm[178]256
5875 p1[178]1:p2[178]10:pv[178]2640:[142]
5880 :
5885 :
5890 pb[178]fa[170]40[172](ln[170]3)[170]16
5895 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
5900 pa[178]mo[170]35[170]5[172]ln:pw[178][194](pa):pm[178]256
5905 p1[178]1:p2[178]10:pv[178]2670:[142]
5910 :
5915 :
5920 pb[178]fa[170]40[172](ln[170]3)[170]21
5925 [129]i[178]pb[164]pb[170]5:[151]i,f2:[130]
5930 pa[178]mo[170]36[170]5[172]ln:pv[178]2700
5935 b[178]([194](pa)[175]24)[173]8:[137]2717
5940 :
5945 :
5950 pb[178]fa[170]40[172](ln[170]3)[170]28
5955 [129]j[178]pb[164]pb[170]4:[151]j,f2:[130]
5960 pa[178]mo[170]36[170]5[172]ln
5965 pv[178]2730:[142]
6000 :
6010 :
6020 :
6030 m[178]4:[158]cl:[153]"wait";f1$
6040 [153]" software-eg":[153]:[153]
6050 [153]" orlenlenlenlen=lenlenlenlen=lenlenlenlen=lenlenlenlen=lenlenlenlen=lenlenlenlenlen=lenlenlenlenlen^"
6060 [153]" peek a peek d peek s peek r peek egapeek formpeekmoduspeek"
6070 [153]" -lenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlen(NULL)lenlenlenlenlen(NULL)lenlenlenlenlen<"
6080 [153]" peek peek peek peek peek peek peek peek"
6090 [153]" /lenlenlenlen>lenlenlenlen>lenlenlenlen>lenlenlenlen>lenlenlenlen>lenlenlenlenlen>lenlenlenlenlenexp"
6100 [158]pr,10,1,f2$;"f1":[153]" f3"
6110 [153]" f5":[153]" f7";f1$
6120 [158]pr,10,13,"++ reset"
6130 [158]pr,11,13,"+ + hold"
6140 [158]pr,12,13,"- - run"
6150 [158]pr,13,13,"--"
6160 [129]i[178]0[164]4
6170 pw[178][194](mo[170]67[170]i)
6180 [158]pr,7,6[170]5[172]i[171][195]([196](pw)),pw
6190 [130]i
6210 pw[178][194](mo[170]72)
6220 [158]pr,7,29,[199](43[170](pw[175]8)[173]4)
6230 [158]pr,7,33,md$((pw[175]6)[173]2)
6240 av[178]6310:an[178]0:[158]gt,av
6300 :
6305 :
6310 pb[178]fa[170]282[170]5[172]an:s[178]2[170]5[172]an
6315 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
6320 pa[178]mo[170]67[170]an:pw[178][194](pa)
6325 pm[178]256:[139]an[178]0[167]pm[178]129
6330 p1[178]1:p2[178]10:pv[178]2760:[142]
6335 :
6340 :
6345 pb[178]fa[170]280[170]27:[151]pb[170]2,f2
6350 pa[178]mo[170]72:pv[178]2780:[142]
6370 :
6375 :
6380 pb[178]fa[170]280[170]33
6385 [129]i[178]pb[164]pb[170]4:[151]i,f2:[130]
6390 pa[178]mo[170]72:pv[178]2820:[142]
6395 :
6400 :
6405 :
6410 [139]av[179][177]6310[167]6420
6415 an[178]an[171]1:[139]an[177][178]0[167]6430
6420 av[178]av[171]35:an[178]4
6425 [139]av[179]6310[167]av[178]6380
6430 [141]5815:[158]gt,av
6435 :
6440 [139]av[179][177]6310[167]6450
6445 an[178]an[170]1:[139]an[179][178]4[167]6460
6450 av[178]av[170]35
6455 [139]av[177]6380[167]av[178]6310:an[178]0
6460 [141]5815:[158]gt,av
6500 :
6510 :
6520 :
6530 m[178]5:pv[178]0:[153]"wait";:[158]cl
6540 [158]pr,1,1,f1$;"kreuzschienen-verteiler"
6550 [158]pr,3,1,"e lfo"
6560 [158]pr,4,1,"g6543210"
6570 [158]pr,5,1,f2$;"totototototototo"
6580 a$[178]f2$[170]"then"[170]f1$[170]" "[170]f2$[170]"(NULL) "[170]f1$
6590 [153]a$;"f1";f2$;" cursortasten"
6600 [153]a$;"f2"
6610 [153]a$;"f3"
6620 [153]a$;"p1";f2$;" f1 ";f1$;"verbindung"
6630 [153]a$;"p2"
6640 [153]a$;"p3";f2$;" f7 ";f1$;"keine verbindung"
6650 [153]a$;"filt"
6660 [153]a$;"laut"
6670 [153]f2$;" tab(tab(tab(tab(tab(tab(tab(tab("
6680 [129]z[178]0[164]7:[141]6730:[130]
6685 z[178]0:s[178]7:[151]55296[170]40[172](6[170]z)[170]8[171]s,f2
6690 [142]
6700 :
6710 :
6720 :
6730 b[178][194](mo[170]24[170]z):a[178]128
6740 [158]pr,6[170]z,1,f1$;"00000000"
6750 [139]b[178]0[167][142]
6760 [129]s[178]7[164]0[169][171]1
6770 [139](b[175]a)[167][158]pr,6[170]z,8[171]s,"1";
6780 a[178]a[173]2:[130]s
6790 [153]f1$;:[142]
6800 :
6810 :
6820 :
6830 [151]55296[170]40[172](6[170]z)[170]8[171]s,f1
6840 z[178](z[171]1)[175]7:[137]6910
6850 [151]55296[170]40[172](6[170]z)[170]8[171]s,f1
6860 z[178](z[170]1)[175]7:[137]6910
6870 [151]55296[170]40[172](6[170]z)[170]8[171]s,f1
6880 s[178](s[170]1)[175]7:[137]6910
6890 [151]55296[170]40[172](6[170]z)[170]8[171]s,f1
6900 s[178](s[171]1)[175]7:[137]6910
6910 [151]55296[170]40[172](6[170]z)[170]8[171]s,f2
6915 [142]
6920 :
6925 :
6930 :
6935 ad[178]mo[170]24[170]z
6940 [151]ad,[194](ad)[176]2[174]s
6950 [151]1024[170]40[172](6[170]z)[170]8[171]s,177:[142]
6960 :
6965 :
6970 :
6975 ad[178]mo[170]24[170]z
6980 [151]ad,[194](ad)[175](255[171]2[174]s)
6990 [151]1024[170]40[172](6[170]z)[170]8[171]s,176:[142]
7000 :
7005 :
7010 :
7015 m[178]6:pv[178]0:[158]cl:[153]"wait";f2$
7020 [158]pr,1,8,"a b c"
7025 [153]f1$;" orlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen^"
7030 [129]i[178]1[164]8
7035 [158]pr,2[170]i,1,f2$;[199](48[170]i);f1$" peek"
7040 [158]pr,2[170]i,38,"peek":[130]
7045 [158]pr,11,3,"/lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenexp"
7050 [158]pr,12,4,f2$;"a-c 1-8"
7055 [158]pr,12,13,f1$;"sound waehlen"
7060 [158]pr,13,1,f2$;"_ a-c 1-8"
7065 [158]pr,13,13,f1$"sound abspeichern"
7070 [158]pr,14,1,f2$;"n"
7075 [158]pr,14,13,f1$;"namen eingeben (return)"
7080 [129]s[178]0[164]2:[129]z[178]0[164]7
7085 [158]pr,3[170]z,4[170]s[172]12,;
7090 [158]na,so[170]107[172](8[172]s[170]z)[170]97
7095 [130]:[130]:[139]ns[179]0[167]z[178]0:s[178]0:[142]
7100 z[178]ns[175]7:s[178][181](ns[173]8):[137]7180
7110 :
7115 :
7120 x[178]a[171]65
7122 [158]pr,12,13,f2$;"waitsound waehlen"
7125 [161]a$:[139]a$[178]""[167]7125
7130 y[178][198](a$)[171]49
7135 [139]y[179]0[176]y[177]7[167]7142
7140 [141]7150:[141]7400
7142 [158]pr,12,13,f1$;"waitsound waehlen"
7144 [142]
7146 :
7150 :
7155 ns[178]8[172]s[170]z
7160 [158]pr,3[170]z,4[170]s[172]12,f1$;"wait";
7165 [158]na,so[170]107[172]ns[170]97
7170 :
7175 s[178]x:z[178]y:ns[178]8[172]s[170]z
7180 [158]pr,3[170]z,4[170]s[172]12,f2$;"wait";
7185 [158]na,so[170]107[172]ns[170]97
7190 [142]
7200 :
7205 :
7210 [158]pr,13,13,f2$;"waitsound abspeichern"
7215 [161]a$:[139]a$[178]""[167]7215
7220 x[178][198](a$)[171]65
7225 [139]x[179]0[176]x[177]2[167]7250
7230 [161]a$:[139]a$[178]""[167]7230
7235 y[178][198](a$)[171]49
7240 [139]y[179]0[176]y[177]7[167]7250
7245 [141]7150:[141]7450:[137]7260
7250 [158]pr,13,13,f1$;"waitsound abspeichern"
7255 [142]
7260 [158]pr,13,13,f1$;"waitsound abspeichern"
7300 :
7305 :
7310 [158]pr,14,13,f2$;"namen eingeben (return)"
7315 x[178]12[172]s[170]4:y[178]z[170]3:ad[178]1024[170]40[172]y[170]x
7320 sa[178]so[170]107[172]ns[170]97:i[178]0
7325 [151]ad[170]i,[194](ad[170]i)[176]128
7330 [161]a$:[139]a$[178]""[167]7330
7335 a[178][198](a$):[139]a[179]32[176]a[177]95[167]7370
7340 :
7345 [158]pr,y,x[170]i,f2$;a$;:[151]sa[170]i,a
7350 i[178]i[170]1
7355 [139]i[177]9[167]i[178]9:[137]7325
7360 [139]i[179]0[167]i[178]0
7365 [137]7325
7370 [139]a[178]29[167][151]ad[170]i,[194](ad[170]i)[175]127:[137]7350
7375 [139]a[178]157[167][151]ad[170]i,[194](ad[170]i)[175]127:i[178]i[171]1:[137]7355
7380 [139]a[179][177]13[167]7330
7385 [151]ad[170]i,[194](ad[170]i)[175]127
7390 [158]pr,14,13,f1$;"namen eingeben (return)"
7395 [142]
7400 :
7402 :
7404 sa[178]so[170]ns[172]107:[158]ge,sa
7406 [129]i[178]0[164]2
7408 ad[178]sa[170]7[172]i
7410 bf(i)[178][183](ad[170]73)
7412 x[178]bf(i)[173]17.0327[173]440
7414 y[178][188](x)[173][188](2)
7416 y[178]y[170]4[170]9[173]12[170]49[173]1200
7418 o(i)[178][181](y):y[178](y[171]o(i))[172]12
7420 t(i)[178][181](y)
7422 of(i)[178][181]((y[171]t(i))[172]100[171]48.5)
7424 s(i)[178]([194](ad[170]75)[178]1)
7425 [151]981[170]i,[182](s(i))
7426 a$[178][199](49[170]i):[141]3570
7428 c(i)[178][194](ad[170]77)[175]254
7429 [151]50334[170]i,c(i):[151]984[170]i,c(i)
7430 c1(i)[178]c(i)[176]1
7431 [151]987[170]i,c1(i)
7432 ad(i)[178][194](ad[170]78)
7434 sr(i)[178][194](ad[170]79)
7436 [130]i
7438 rf[178][194](sa[170]94)
7440 eg[178]([194](sa[170]95)[178]1):[141]3740
7441 [151]990,[182](eg)
7442 su[178]([194](sa[170]96)[178]1):[141]3840
7443 [151]991,[182](su)
7444 [141]20000:[142]
7450 :
7452 :
7454 sa[178]so[170]ns[172]107:[158]pu,sa
7456 [129]sn[178]0[164]2
7458 ad[178]sa[170]7[172]sn
7460 [158]do,ad[170]73,bf(sn)
7462 [151]ad[170]75,[171]s(sn)
7464 [151]ad[170]77,c(sn)
7466 [151]ad[170]78,ad(sn)
7468 [151]ad[170]79,sr(sn)
7470 [130]sn
7472 [151]sa[170]94,rf
7474 [151]sa[170]95,[171]eg
7476 [151]sa[170]96,[171]su
7478 [142]
7500 :
7505 :
7510 :
7515 m[178]7:pv[178]0:[158]cl:[153]"";f1$
7520 [153]" disk"
7525 [158]pr,5,4,f2$;"f1"
7530 [158]pr,5,7,f1$;"sounds laden"
7532 [158]pr,6,4,f2$;"f2"
7534 [158]pr,6,7,f1$;"song laden"
7535 [158]pr,7,4,f2$;"f3"
7540 [158]pr,7,7,f1$;"sounds abspeichern"
7545 [142]
7600 :
7605 :
7610 [158]pr,5,7,f2$;"sounds laden"
7615 [158]pr,10,4,f1$;"dateiname";
7620 dn$[178]"sounds "
7625 [158]pr,10,16,dn$
7630 [158]pr,10,14,;:[133]dn$
7632 [158]50198:[141]2140
7635 [159]8,8,8,dn$[170]",p,r":[160]8
7640 [159]1,8,15:[132]1,a,a$,x,y:[160]1
7645 [158]pr,12,4," "
7650 [139]a[178]0[167]7660
7655 [158]pr,12,3,a;a$;x;y:[137]7625
7660 a[178]0:[147]dn$,8,1
7665 [158]pr,5,7,f1$;"sounds laden"
7670 ns[178][171]1:a[178]211
7675 [158]do,56326,[181](6e7[173](24[172]te))
7680 [139]sr[167][158]51093:[137]1550
7685 [158]mo[170]1033:[137]1550
7700 :
7705 :
7710 [158]pr,7,7,f2$;"sounds abspeichern"
7715 [158]pr,10,4,f1$;"dateiname";
7720 dn$[178]"sounds "
7725 [158]pr,10,16,dn$
7730 [158]pr,10,14,;:[133]dn$
7735 [158]50198:[141]2140
7740 :
7745 [159]1,8,1,"@:"[170]dn$
7750 [151]252,0:[151]253,144
7755 [151]780,252
7760 [151]781,8
7765 [151]782,154
7770 [158]65496
7775 [160]1
7780 [159]1,8,15:[132]1,a,a$,x,y:[160]1
7785 [139]a[178]0[167]7795
7790 [158]pr,12,4,a;a$;x;y:[137]7725
7795 [158]pr,12,4," "
7800 [158]pr,7,7,f1$;"sounds abspeichern"
7805 [158]do,56326,[181](6e7[173](24[172]te))
7810 [139]sr[167][158]51093:[142]
7815 [158]50185:[142]
7900 :
7905 :
7910 [158]pr,6,7,f2$;"song laden"
7915 [158]pr,10,4,f1$;"dateiname ";
7920 [158]pr,10,14,;:[133]dn$
7925 [158]50966:[141]2140
7930 [159]8,8,8,dn$[170]",p,r":[160]8
7935 [159]1,8,15:[132]1,a,a$,x,y:[160]1
7940 [158]pr,12,4," "
7945 [139]a[178]0[167]7955
7950 [158]pr,12,3,a;a$;x;y:[137]7920
7955 a[178]0:m[178]7.5:[147]dn$,8,1
7960 [158]pr,6,7,f1$;"song laden"
7965 m[178]7:sq[178][171]1
7970 [158]do,56326,[181](6e7[173](24[172]te))
7975 [158]do,50310,[183](39432)
7980 [158]51001
7985 [139][168]sr[167][158]50966
7990 a[178]65:[137]1550
8000 :
8010 :
8020 :
8030 [153]"loadreturn ";
8035 [153]"bitte 40 sekunden warten"
8040 :
8045 :
8050 [129]i[178]0[164]22
8055 [151]828[170]i,[194](43139[170]i):[130]
8060 [129]i[178]0[164]129:[135]x:[151]851[170]i,x:[130]
8065 [151]785,169:[151]786,3
8070 :
8072 :
8074 [129]i[178]50211[164]50291
8076 [135]x:[151]i,x:[130]
8078 :
8080 :
8082 [129]i[178]0[164]11:[135]tn$(i):[130]
8100 :
8110 :
8120 [135]a$:l[178][195](a$)
8130 [145]l[137]8150,8220,8280,8310,8310
8150 :
8160 a[178][198](a$)
8170 [139]m[177][178]0[167]v%(m,a)[178]zn:[137]8120
8180 [129]i[178]0[164]8:v%(i,a)[178]zn:[130]
8190 [137]8120
8200 [139][200](a$,1)[179][177]"m"[167]8120
8220 :
8230 [139][200](a$,1)[179][177]"m"[167]8120
8240 a$[178][201](a$,1)
8250 [139]a$[178]"a"[167]m[178][171]1:[137]8120
8260 m[178][197](a$):[137]8120
8280 :
8290 a[178][197](a$):[137]8170
8310 :
8320 [139]a$[178]"ende"[167]8340
8330 zn[178][197](a$):[137]8120
8340 :
8350 :
8360 a$[178]"q2w3er5t6y7ui9o0p@-*\^;="
8370 [129]i[178]0[164]24
8380 a[178][198]([202](a$,i[170]1,1))
8390 tn%(a)[178]i
8400 [129]j[178]0[164]8:v%(j,a)[178]2000:[130]
8410 [130]i
8450 :
8455 :
8460 [129]i[178]0[164]48:th(i)[178]2[174](i[173]12):[130]
8465 :
8470 :
8472 gs[178]828:gt[178]857:pr[178]869:do[178]897:cl[178]959
8474 na[178]50229:ge[178]50245:pu[178]50276
8480 si[178]54272:mo[178]49152:fa[178]55296
8482 so[178]36864:ci[178]56320
8484 f1$[178][199](30):f1[178]5
8490 f2$[178][199](5):f2[178]1
8495 kv$(0)[178]"trian ":kf$(0)[178]"(NULL)(NULL)(NULL)(NULL)"
8500 kv$(1)[178]"sawup ":kf$(1)[178]"(NULL)(NULL)(NULL)(NULL)"
8505 kv$(2)[178]"sawdwn":kf$(2)[178]"sqr(NULL)sqr(NULL)"
8510 kv$(3)[178]"square":kf$(3)[178]"(NULL)(NULL)(NULL)(NULL)"
8515 md$(0)[178]"reset":md$(1)[178]"reset"
8520 md$(2)[178]"hold ":md$(3)[178]"run "
8525 bl$(0)[178]"":bl$(1)[178]" ":bl$(2)[178]" "
8530 bl$(3)[178]" ":bl$(4)[178]" "
8535 bl$(5)[178]" ":bl$(6)[178]" "
8540 :
8545 :
8550 [129]sn[178]0[164]2
8555 [151]si[170]7[172]sn[170]5,10:ad(sn)[178]10
8560 [151]si[170]7[172]sn[170]6,138:sr(sn)[178]138
8565 o(sn)[178]3[170]sn:of(sn)[178]0:t(sn)[178]0
8570 bf[178]440[172]2[174](o(sn)[171]4[170](t(sn)[171]9)[173]12[170]of(sn)[173]1200)
8572 bf(sn)[178]bf[172]17.0327
8575 c(sn)[178]64:c1(sn)[178]65
8576 [151]984[170]sn,c(sn):[151]987[170]sn,c1(sn)
8578 [151]50334[170]sn,c(sn)
8580 s(sn)[178](sn[178]0)
8582 [151]981[170]sn,[182](s(sn))
8585 [158]do,mo[170]7[172]sn[170]2,2048
8590 [151]mo[170]7[172]sn[170]4,0
8595 [130]sn
8600 [151]si[170]23,0:rf[178]0
8605 [158]do,mo[170]21,0
8610 [151]mo[170]23,15
8615 [129]i[178]24[164]72
8620 [151]mo[170]i,0:[130]
8625 eg[178]0
8627 [151]50303,0
8630 su[178]0
8631 [151]990,[182](eg):[151]991,[182](su)
8632 te[178]120
8635 :
8640 :
8645 [129]ns[178]0[164]23
8650 [141]7450
8655 ad[178]so[170]107[172]ns[170]97
8660 [129]i[178]ad[164]ad[170]9:[151]i,46:[130]
8665 [130]ns:ns[178]0
8666 [141]20000:w[178]1
8700 :
8870 :
8880 [151]53280,0:[151]53281,0
8890 [153]f1$;"wait";:[151]650,128
8900 [141]4200
8910 [158]mo[170]1033
8920 sq[178]0:sm[178]0:sr[178]0:a[178]2:[142]
9000 :
9010 :
9020 :
9030 :
9060 [131]032,089,003,076,174,167,032
9070 [131]253,174,032,138,173,032,247
9080 [131]183,076,163,168,032,253,174
9090 [131]032,158,183,138,072,032,253
9100 [131]174,032,158,183,138,168,104
9110 [131]170,024,032,240,255,032,253
9120 [131]174,076,160,170,032,253,174
9130 [131]032,138,173,032,247,183,165
9140 [131]020,133,158,165,021,133,159
9150 [131]032,253,174,032,138,173,032
9160 [131]247,183,160,000,120,165,020
9170 [131]145,158,200,165,021,145,158
9180 [131]088,096,032,247,183,160,000
9190 [131]120,177,020,133,099,200,177
9200 [131]020,088,133,098,162,144,056
9210 [131]076,073,188,169,032,162,000
9220 [131]157,000,004,157,000,005,202
9230 [131]208,247,162,087,157,000,006
9240 [131]202,016,250,096
9250 :
9260 :
9270 [131]032,253,174,032,138,173,032
9280 [131]247,183,165,020,133,158,165
9290 [131]021,133,159,096,032,035,196
9300 [131]160,000,177,158,032,210,255
9310 [131]200,192,010,208,246,096,032
9320 [131]035,196,160,000,177,158,153
9330 [131]000,192,200,192,073,208,246
9340 [131]177,158,153,183,211,200,192
9350 [131]094,208,246,177,158,141,023
9360 [131]212,096,032,035,196,160,000
9370 [131]185,000,192,145,158,200,192
9380 [131]073,208,246,096
9400 :
9410 :
9420 [131]c,c#,d,d#,e,f,f#,g,g#,a,a#,h
9500 :
9510 :
9520 [131]ma,4000,x,3500,v,3600,032
9530 [131]ma,3700,160,3800,s,9990,a
9540 [131]ma,2550,133,2560,134
9550 [131]ma,2570,135,2580,136,4500,214
9555 [131]ma,5500,l,6000,h,6500,k
9560 [131]ma,5000,f,7000,211,7500,d
9565 [131]m1,4654,145,4660,017
9570 [131]m1,4666,029,4680,157
9580 [131]m2,5160,157,5145,029
9600 [131]m3,5675,145,5690,017
9610 [131]m3,5720,157,5705,029
9620 [131]m4,6410,157,6440,029
9630 [131]m5,6830,145,6850,017
9640 [131]m5,6870,157,6890,029
9650 [131]m5,6935,133,134,6975,135,136
9700 [131]m6,7110,a,b,c,7200,_,7300,n
9750 [131]m7,7600,133,7700,134,7900,137
9800 [131]m8,10420,029,10450,157
9900 [131]ende
9990 :
10000 :
10010 :
10020 :
10030 m[178]8:pv[178]0:[158]cl:[153]"";f1$;
10040 [153]" sequencer";
10045 [139][168]sq[167][153]" (kein song vorhanden)"
10050 [158]pr,4,10,"tempo modus seqnr soft-eg"
10060 [158]pr,5,4,"orlenlenlenlen=lenlenlenlenlen=lenlenlenlenlen=lenlenlenlenlen=lenlenlenlenlenlenlenlenlen^"
10070 [158]pr,6,4,"peek peek peek peek peek 1 2 3 peek"
10080 [158]pr,7,4,"/lenlenlenlen>lenlenlenlenlen>lenlenlenlenlen>lenlenlenlenlen>lenlenlenlenlenlenlenlenlenexp"
10090 [158]pr,9,1,f2$;"f1";f1$;" reset ++ 1"
10100 [158]pr,10,1,f2$;"f3";f1$;" stop + song + 2"
10110 [158]pr,11,1,f2$;"f5";f1$;" run - seq - 3"
10120 [158]pr,12,1,f2$;"f7";f1$;" --"
10130 [139]sr[167]10150
10140 [158]pr,6,5,"stop":[137]10160
10150 [158]pr,6,5,"run "
10160 [158]pr,6,11,[201]([196](te),3)
10170 [139]sm[167]10190
10180 [158]pr,6,16,"song":[137]10210
10190 [158]pr,6,16,"seq "
10200 [158]pr,6,22,[201](" "[170][196](se),3)
10210 :
10220 x[178][194](50303)
10230 [139]x[175]1[167][158]pr,6,28," 1 "
10240 [139]x[175]2[167][158]pr,6,31," 2 "
10250 [139]x[175]4[167][158]pr,6,34," 3 "
10300 av[178]10500:[158]gs,av:[142]
10400 :
10410 :
10420 :
10430 av[178]av[170]100:[139]av[177]10900[167]av[178]10500
10440 [137]10470
10450 :
10460 av[178]av[171]100:[139]av[179]10500[167]av[178]10900
10470 [129]i[178]pb[164]pb[170]8:[151]i,f1:[130]
10480 [158]gt,av
10500 :
10510 :
10520 pb[178]fa[170]245
10530 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
10540 pa[178]ci[170]12:pv[178]11000:[142]
10600 :
10610 :
10620 pb[178]fa[170]250
10630 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
10640 pa[178]ci[170]6:pw[178]te
10650 pm[178]500:p1[178]1:p2[178]10:pv[178]3400:[142]
10700 :
10710 :
10720 pb[178]fa[170]256
10730 [129]i[178]pb[164]pb[170]3:[151]i,f2:[130]
10740 pa[178]50345:pw[178][194](pa)
10750 pv[178]11100:[142]
10800 :
10810 :
10820 pb[178]fa[170]262
10830 [129]i[178]pb[164]pb[170]2:[151]i,f2:[130]
10840 pw[178]se:p1[178]1:p2[178]1:pm[178]1000
10850 pv[178]11200:[142]
10900 :
10910 :
10920 pb[178]fa[170]268
10930 [129]i[178]pb[164]pb[170]8:[151]i,f2:[130]
10940 pa[178]50303:pv[178]11300:[142]
11000 :
11010 :
11015 [139][168]sq[167][142]
11020 [139]a[179]133[176]a[177]135[167][142]
11030 [145]a[171]132[137]11040,11060,11080
11040 :
11042 [139]sm[167][158]51116:[142]
11045 [158]51001
11050 [139][168]sr[167][158]50966
11055 [142]
11060 :
11065 [158]50966:[158]pr,6,5,f2$;"stop"
11070 sr[178]0:[139][168]su[167]2140
11075 [142]
11080 :
11085 [158]51093:[158]pr,6,5,f2$;"run"
11090 sr[178][171]1:[142]
11100 :
11110 :
11112 [139][168]sq[167][142]
11115 [139]a[178]134[167]11130
11120 [139]a[178]135[167]11150
11125 [142]
11130 :
11135 sm[178]0:[151]pa,0
11140 [158]pr,6,16,f2$;"song"
11145 [158]pr,6,22," ":[142]
11150 :
11155 sm[178][171]1:[151]pa,1:[158]pr,6,16,"seq "
11160 [158]pr,6,16,f2$;"seq "
11165 se[178]([183](50312)[171][183](50310))[173]3[170]1
11170 [158]pr,6,22,f1$;[201](" "[170][196](se),3)
11175 [142]
11200 :
11210 :
11220 [139][168]sm[167][142]
11230 [139]pw[178]0[167]pw[178]1:[142]
11240 ad[178][183](50310)[170](pw[171]1)[172]3
11250 [139][183](ad)[178]0[167]pw[178]pw[171]1:[142]
11260 [158]do,50312,ad:se[178]pw
11270 [158]do,50314,[183](ad)
11280 [158]51116
11285 [158]pr,6,22,f2$;[201](" "[170][196](se),3)
11290 [142]
11300 :
11310 :
11320 x[178][194](pa)
11330 [129]i[178]0[164]2
11340 [139]a[179][177]133[170]i[167]11420
11350 y[178]2[174]i
11360 [139](x[175]y)[167]11400
11370 x[178]x[176]y:[151]pa,x
11380 [158]pr,6,28[170]3[172]i,f2$;"";i[170]1;"cmd "
11390 [137]11420
11400 x[178]x[175](255[171]y):[151]pa,x
11410 [158]pr,6,28[170]3[172]i,f2$;i[170]1;"cmd "
11420 [130]i:[142]
20000 [139]w[178]1[167][158]pr,18,1,;"sh w wersiboard stimmenwait"
20010 [129]xx[178]0[164]2:zz[178][171]2
20020 [129]yy[178]0[164]48
20025 zz[178]zz[170]2
20030 ww[178]th(yy)[172]bf(xx)
20040 [139]ww[177]65535[167]ww[178]0
20050 [158] do,52950[170](98[172]xx)[170]zz,ww
20060 [130]yy,xx
20070 [139]w[178]1[167][158]pr,18,1,;"sh w wersiboard stimmen"
20080 [142]